; Music of Master of the Lamps (1985) (Activision)
; Ripped by Megachur the 23/08/2008

	write "MASTEOTL.BIN"

music_date_rip	equ &1788
music_adr	equ &9413
first_theme	equ 0
last_theme	equ 11	; 0 -> 11

	read "music_header_v1_0.asm"

;#9413
.l9418 equ $ + 5
	db #3c,#03,#3c,#33,#03,#00
.l941b equ $ + 2
.l941a equ $ + 1
.l9419
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
.l9463 equ $ + 2
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00
;
.real_init_music
;
	push de
	call l954e
	ld b,#4a
	sub a
	ld hl,l9419
.l94c7
	ld (hl),a
	inc hl
	djnz l94c7
	pop de
	ld d,a
	ld a,e
	sla a
	add e
	sla a
	ld e,a
	ld hl,l9907
	add hl,de
	ld ix,l941b
	ld b,#03
	ld de,#0018
.l94e1
	ld a,(hl)
	ld (ix+#00),a
	inc hl
	ld a,(hl)
	ld (ix+#01),a
	inc hl
	add ix,de
	djnz l94e1
	ld a,#38
	ld (l9419),a
	ld e,a
	ld a,#07
	call l9560
	ld b,#03
	ld ix,l941b
	ld de,#0018
	ld hl,l9463
.l9506
	ld (ix+#02),l
	ld (ix+#03),h
	ld a,#01
	ld (ix+#0a),a
	add ix,de
	ld a,#1e
	add l
	ld l,a
	jr nc,l951a
	inc h
.l951a
	djnz l9506
	ld hl,l9569
	ld bc,#8100
	ld de,l9546
	call #bcd7
	ld a,#00
	ld (l9418),a
	ret
	db #dd,#1d,#2f,#1c,#9b,#1a,#1c,#19
	db #b4,#17,#5f,#16,#1e,#15,#ee,#13
	db #d0,#12,#c1,#11,#c2,#10,#d1,#0f
.l9546
	push ix
	call l9572
	pop ix
	ret
.l954e
	ld a,#ff
	ld (l9418),a
	ld a,#08
	ld e,#00
	ld b,#03
.l9559
	call l9560
	inc a
	djnz l9559
	ret
.l9560
	push af
	push bc
	ld c,e
	call #bd34
	pop bc
	pop af
	ret
.l9569
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00
;
.play_music
.l9572
;
	ld a,(l9418)
	and a
	ret nz
	ld b,#03
	ld ix,l941b
.l957d
	dec (ix+#0a)
	jr nz,l95f0
	ld e,(ix+#00)
	ld d,(ix+#01)
.l9588
	ld a,(de)
	and #c0
	cp #c0
	jr z,l95fa
	ld a,(de)
	srl a
	and #07
	ld c,a
	ld a,(de)
	srl a
	srl a
	srl a
	srl a
	add (ix+#04)
.l95a1
	cp #0c
	jr c,l95aa
	sub #0c
	inc c
	jr l95a1
.l95aa
	sla a
	add #2e
	ld l,a
	ld h,#95
	jr nc,l95b4
	inc h
.l95b4
	ld a,(hl)
	inc hl
	push af
	ld a,(hl)
	ld h,a
	pop af
	ld l,a
	ld a,c
	and a
	jr z,l95c6
.l95bf
	srl h
	rr l
	dec c
	jr nz,l95bf
.l95c6
	ld (ix+#05),l
	ld (ix+#06),h
	ld a,#00
	ld (ix+#07),a
	ld (ix+#08),a
	ld a,#01
	ld (ix+#09),a
	ld a,(de)
	srl a
	jr nc,l95e3
	inc de
	ld a,(de)
	ld (ix+#0b),a
.l95e3
	ld a,(ix+#0b)
	ld (ix+#0a),a
	inc de
.l95ea
	ld (ix+#00),e
	ld (ix+#01),d
.l95f0
	ld de,#0018
	add ix,de
	djnz l957d
	jp l97b8
.l95fa
	ld a,(de)
	inc de
	and #3f
	sla a
	ld hl,l960d
	add l
	ld l,a
	jr nc,l9608
	inc h
.l9608
	ld a,(hl)
	inc hl
	ld h,(hl)
	ld l,a
	jp (hl)
.l960d
	dw l962f,l9643,l9665,l967f
	dw l9696,l971c,l9717,l96a3
	dw l96af,l972d,l9735,l974d
	dw l9758,l9767,l9796,l978b
	dw l97ab
.l962f
	ld a,(de)
	ld l,a
	inc de
	ld a,(de)
	ld h,a
	inc de
	call l96c7
	call l96da
	ld a,(de)
	ld (ix+#04),a
	ex de,hl
	jp l9588
.l9643
	call l9702
	call l96ef
	inc de
	ld a,(de)
	cp #ff
	jr z,l965c
	ld (ix+#04),a
	call l96c7
	call l96da
	ex de,hl
	jp l9588
.l965c
	ld a,#00
	ld (ix+#04),a
	inc de
	jp l9588
.l9665
	ld a,(de)
	ld b,a
	srl b
	srl b
	srl b
	srl b
	and #0f
	ex de,hl
.l9672
	inc hl
	ld e,(hl)
	call l9560
	inc a
	djnz l9672
	ex de,hl
	inc de
	jp l9588
.l967f
	ld a,(de)
	ld (ix+#0c),a
	inc de
	ld a,(de)
	ld (ix+#0d),a
	inc de
	ld a,(de)
	ld (ix+#0e),a
	inc de
	ld a,(de)
	ld (ix+#0f),a
	inc de
	jp l9588
.l9696
	ld a,#ff
	ld (l9418),a
	ld a,#01
	ld (#06fb),a
	jp l954e
.l96a3
	ld a,(de)
	inc de
	ld l,a
	call l96c7
	call l96da
	jp l9588
.l96af
	call l9702
	dec l
	jr z,l96c1
	call l96ef
	call l96c7
	call l96da
	jp l9588
.l96c1
	call l9702
	jp l9588
.l96c7
	push hl
	ld l,(ix+#02)
	ld h,(ix+#03)
	ld (hl),e
	inc hl
	ld (hl),d
	inc hl
	ld (ix+#02),l
	ld (ix+#03),h
	pop hl
	ret
.l96da
	push de
	ld e,(ix+#02)
	ld d,(ix+#03)
	ld a,l
	ld (de),a
	inc de
	ld a,h
	ld (de),a
	inc de
	ld (ix+#02),e
	ld (ix+#03),d
	pop de
	ret
.l96ef
	push hl
	ld l,(ix+#02)
	ld h,(ix+#03)
	dec hl
	ld d,(hl)
	dec hl
	ld e,(hl)
	ld (ix+#02),l
	ld (ix+#03),h
	pop hl
	ret
.l9702
	push de
	ld e,(ix+#02)
	ld d,(ix+#03)
	dec de
	ld a,(de)
	ld h,a
	dec de
	ld a,(de)
	ld l,a
	ld (ix+#02),e
	ld (ix+#03),d
	pop de
	ret
.l9717
	ld a,(de)
	inc de
	ld (ix+#0b),a
.l971c
	ld a,(ix+#0b)
	ld (ix+#0a),a
	ld a,#00
	ld (ix+#09),a
	ld (ix+#08),a
	jp l95ea
.l972d
	ld a,(de)
	inc de
	ld (ix+#0c),a
	jp l9588
.l9735
	ld a,#01
	or (ix+#11)
	ld (ix+#11),a
	ld a,(de)
	ld (ix+#14),a
	inc de
	ld a,(de)
	ld (ix+#13),a
	inc de
	ld (ix+#12),a
	jp l9588
.l974d
	ld a,#fe
	and (ix+#11)
	ld (ix+#11),a
	jp l9588
.l9758
	ld a,b
	cp #03
	jr nz,l975e
	inc a
.l975e
	ld c,a
	sla a
	sla a
	sla a
	jr l9776
.l9767
	ld a,b
	cp #03
	jr nz,l976d
	inc a
.l976d
	ld l,a
	sla a
	sla a
	sla a
	ld c,a
	ld a,l
.l9776
	cpl
	ld l,a
	ld a,(l9419)
	and l
	or c
	ld (l9419),a
	push de
	ld e,a
	ld a,#07
	call l9560
	pop de
	jp l9588
.l978b
	ld a,#fd
	and (ix+#11)
	ld (ix+#11),a
	jp l9588
.l9796
	ld a,#02
	or (ix+#11)
	ld (ix+#11),a
	ld a,(de)
	ld (ix+#16),a
	inc de
	ld a,(de)
	ld (ix+#17),a
	inc de
	jp l9588
.l97ab
	ld a,(ix+#0b)
	and a
	jp z,l9588
	dec (ix+#0b)
	jp l9588
.l97b8
	ld ix,l941b
	ld b,#03
.l97be
	push bc
	ld a,(ix+#09)
	and a
	jr z,l9837
	srl a
	jr nc,l9803
	ld a,(ix+#0d)
	and a
	jr nz,l97d7
	ld a,(ix+#0c)
	ld (ix+#08),a
	jr l97f7
.l97d7
	ld b,(ix+#0c)
	ld a,(ix+#07)
.l97dd
	add (ix+#0d)
	jr nc,l97e5
	inc (ix+#08)
.l97e5
	djnz l97dd
	ld (ix+#07),a
	ld a,(ix+#0c)
	cp (ix+#08)
	jr z,l97f7
	jr nc,l9837
	ld (ix+#08),a
.l97f7
	sla (ix+#09)
	ld a,(ix+#0e)
	ld (ix+#10),a
	jr l9837
.l9803
	srl a
	jr nc,l9816
	dec (ix+#10)
	jr nz,l9837
	sla (ix+#09)
	ld a,(ix+#0f)
	and a
	jr z,l982c
.l9816
	ld b,#08
	ld a,(ix+#07)
.l981b
	sub (ix+#0f)
	jr nc,l9825
	dec (ix+#08)
	jr z,l982c
.l9825
	djnz l981b
	ld (ix+#07),a
	jr l9837
.l982c
	ld a,#00
	ld (ix+#07),a
	ld (ix+#08),a
	ld (ix+#09),a
.l9837
	pop bc
	push bc
	dec b
	ld de,#0018
	ld iy,l941b
	ld c,#03
.l9843
	ld a,(iy+#11)
	and #02
	jr z,l9850
	ld a,(iy+#16)
	cp b
	jr z,l988c
.l9850
	add iy,de
	dec c
	jr nz,l9843
	ld a,b
	sla a
	ld (l941a),a
	ld e,(ix+#05)
	call l9560
	inc a
	ld e,(ix+#06)
	call l9560
	ld a,b
	or #08
	ld e,(ix+#08)
	call l9560
	ld b,#08
	ld hl,l9897
	ld a,(ix+#11)
.l9879
	srl a
	jr nc,l9888
	push af
	push bc
	push hl
	ld a,(hl)
	inc hl
	ld h,(hl)
	ld l,a
	jp (hl)
.l9885
	pop hl
	pop bc
	pop af
.l9888
	inc hl
	inc hl
	djnz l9879
.l988c
	pop bc
	ld de,#0018
	add ix,de
	dec b
	jp nz,l97be
	ret
.l9897
	sbc e
	sbc b
	call c,#dd98
	dec (hl)
	ld (de),a
	jr nz,l9885
	ld a,(ix+#13)
	ld (ix+#12),a
	ld a,(ix+#15)
	cpl
	ld (ix+#15),a
	ld a,(ix+#05)
	jp m,l98c2
	sub (ix+#14)
	call l98cd
	jr nc,l98bc
	dec e
.l98bc
	ld a,b
	call l9560
	jr l9885
.l98c2
	add (ix+#14)
	call l98cd
	jr nc,l98bc
	inc e
	jr l98bc
.l98cd
	push af
	ld e,a
	ld a,(l941a)
	call l9560
	inc a
	ld b,a
	ld e,(ix+#06)
	pop af
	ret
	ld c,(ix+#16)
	sla c
	ld a,(ix+#05)
	add (ix+#17)
	push af
	ld e,a
	ld a,c
	call l9560
	pop af
	ld a,(ix+#06)
	adc #00
	ld e,a
	inc c
	ld a,c
	call l9560
	ld e,(ix+#08)
	ld a,(ix+#16)
	or #08
	call l9560
	jp l9885
.l9907
	dw l9955,l997c,l99bb,l9a25
	dw l9a47,l9a6d,l9adb,l9aeb
	dw l9afe,l9bae,l9bcb,l9be7
	dw l9c8f,l9cbd,l9ceb,l9d83
	dw l9d98,l9dc4,l9e4a,l9e77
	dw l9e8a,l9f5d,l9f82,l9fc1
	dw la01e,la034,la049,la0b5
	dw la0d0,la0ea,la1ae,la1c0
	dw la1d1,la1ec,la205,la215
	dw la22f,la23f,la24e
.l9955
	db #c3,#0c,#40,#01,#04,#c7,#03,#c0
	db #e1,#99,#00,#00,#00,#ff,#c7,#04
	db #c0,#f3,#99,#00,#ff,#c8,#c9,#0d
	db #c8,#c0,#e1,#99,#00,#00,#ff,#c0
.l997c equ $ + 7
	db #0b,#9a,#00,#ff,#c6,#0a,#c4,#c3
	db #0c,#00,#01,#06,#c0,#e1,#99,#0c
	db #0c,#0c,#ff,#c7,#04,#c0,#f3,#99
	db #0c,#ff,#c8,#c0,#f9,#99,#00,#00
	db #00,#ff,#c7,#04,#c0,#f3,#99,#18
	db #ff,#c8,#c0,#f9,#99,#18,#18,#18
	db #ff,#c7,#04,#c0,#f3,#99,#18,#ff
	db #c8,#c0,#e1,#99,#18,#18,#ff,#c0
.l99bb equ $ + 6
	db #0b,#9a,#18,#ff,#c6,#0a,#c3,#09
	db #00,#01,#06,#c7,#03,#c7,#03,#c0
	db #1b,#9a,#10,#0f,#ff,#c8,#c0,#1b
	db #9a,#0e,#11,#ff,#c8,#c9,#0c,#c0
	db #e1,#99,#0c,#0c,#ff,#c0,#0b,#9a
	db #0c,#ff,#c6,#0a,#05,#1e,#45,#14
	db #75,#0a,#94,#74,#55,#14,#95,#0a
	db #06,#36,#36,#26,#06,#c1,#75,#0a
	db #74,#54,#24,#c1,#79,#0a,#98,#78
	db #0b,#14,#79,#0a,#98,#0a,#88,#98
	db #0a,#2a,#7b,#14,#5a,#c1,#07,#0a
	db #06,#a4,#a4,#94,#94,#84,#84,#74
	db #c5,#15,#0f,#05,#2d,#c1,#c7,#02
	db #09,#0a,#09,#14,#09,#0a,#c8,#c1
.l9a25
	db #c3,#0d,#40,#01,#04,#ce,#01,#06
	db #c7,#02,#c0,#90,#9a,#0c,#0c,#11
	db #0c,#13,#11,#0c,#ff,#c0,#a2,#9a
	db #00,#ff,#cf,#c8,#c0,#b5,#9a,#00
.l9a47 equ $ + 2
	db #ff,#c4,#c3,#0a,#00,#01,#80,#c6
	db #60,#c5,#c7,#0e,#c0,#8a,#9a,#00
	db #ff,#c8,#c3,#0a,#00,#00,#c0,#c0
	db #c0,#9a,#00,#00,#05,#00,#07,#05
	db #00,#07,#ff,#c0,#b5,#9a,#03,#ff
.l9a6d
	db #c3,#0a,#00,#01,#b0,#cc,#c6,#60
	db #c5,#c0,#8a,#9a,#00,#00,#ff,#c7
	db #0e,#c0,#d1,#9a,#00,#00,#ff,#c8
	db #c0,#b5,#9a,#07,#ff,#c6,#18,#08
	db #c5,#08,#c1,#43,#24,#25,#0c,#c5
	db #45,#18,#43,#0c,#c5,#24,#75,#24
	db #b3,#0c,#24,#44,#c1,#b3,#18,#25
	db #0c,#34,#64,#84,#c5,#95,#18,#85
	db #0c,#94,#84,#64,#34,#c6,#18,#c1
	db #c3,#0b,#c0,#10,#02,#cd,#c6,#18
	db #47,#60,#c1,#2b,#0c,#b8,#1a,#2b
	db #18,#1a,#b9,#0c,#78,#48,#68,#79
	db #18,#c6,#24,#c1,#c9,#0d,#c7,#10
.l9adb equ $ + 6
	db #09,#06,#c9,#08,#c8,#c1,#c3,#0d
	db #80,#10,#10,#c0,#2a,#9b,#00,#01
.l9aeb equ $ + 6
	db #02,#03,#04,#05,#ff,#c4,#c3,#0c
	db #c0,#03,#80,#c0,#2a,#9b,#18,#ff
	db #c0,#68,#9b,#0d,#0e,#0f,#10,#11
.l9afe equ $ + 1
	db #ff,#c3,#0c,#c0,#03,#a0,#c0,#2a
	db #9b,#18,#ff,#c0,#56,#9b,#01,#04
	db #06,#08,#ff,#c0,#8b,#9b,#0e,#ff
	db #c0,#56,#9b,#03,#06,#08,#0a,#ff
	db #c0,#8b,#9b,#10,#ff,#c0,#56,#9b
	db #05,#08,#0a,#0c,#ff,#23,#1e,#93
	db #05,#b2,#05,#0a,#04,#b2,#92,#53
	db #1e,#35,#05,#54,#75,#0a,#74,#54
	db #34,#73,#1e,#55,#05,#74,#95,#0a
	db #94,#74,#54,#92,#95,#05,#74,#95
	db #0f,#45,#05,#75,#0a,#94,#04,#14
	db #c1,#27,#05,#28,#96,#b6,#08,#28
	db #58,#68,#88,#98,#0a,#98,#0a,#98
	db #68,#58,#c1,#29,#0a,#96,#08,#29
	db #14,#97,#0a,#08,#28,#08,#76,#96
	db #09,#14,#77,#0a,#96,#08,#b6,#76
	db #96,#b7,#14,#77,#0a,#96,#b6,#97
	db #1e,#96,#97,#0a,#c5,#c1,#69,#0a
	db #28,#58,#69,#14,#29,#0a,#58,#68
	db #58,#08,#38,#59,#14,#09,#0a,#38
	db #58,#78,#28,#58,#79,#14,#29,#0a
	db #58,#78,#19,#1e,#18,#19,#0a,#c5
.l9bae equ $ + 1
	db #c1,#c3,#0d,#00,#06,#03,#c7,#02
	db #c0,#20,#9c,#00,#00,#05,#00,#ff
	db #c0,#3b,#9c,#00,#02,#04,#ff,#c0
.l9bcb equ $ + 6
	db #47,#9c,#00,#ff,#c8,#c4,#c3,#0d
	db #00,#06,#03,#c7,#02,#c0,#20,#9c
	db #18,#18,#1d,#18,#ff,#c0,#3b,#9c
	db #18,#1a,#1c,#ff,#c0,#47,#9c,#0c
.l9be7 equ $ + 2
	db #ff,#c8,#c3,#0d,#c0,#03,#d0,#c0
	db #82,#9c,#18,#0c,#18,#0c,#11,#05
	db #18,#0c,#14,#16,#18,#ff,#c0,#47
	db #9c,#24,#ff,#c0,#4e,#9c,#0c,#ff
	db #c0,#60,#9c,#00,#ff,#c0,#4e,#9c
	db #05,#ff,#c0,#60,#9c,#00,#ff,#c0
	db #3b,#9c,#24,#26,#28,#ff,#c0,#47
	db #9c,#24,#ff,#73,#18,#75,#12,#25
	db #06,#55,#0c,#74,#a5,#12,#25,#06
	db #55,#0c,#74,#a5,#12,#25,#06,#74
	db #54,#25,#0c,#52,#62,#c1,#33,#18
	db #35,#12,#a3,#06,#15,#0c,#34,#54
	db #64,#c1,#c6,#0c,#04,#14,#25,#3c
	db #c1,#79,#0c,#28,#a8,#79,#18,#58
	db #29,#0c,#58,#48,#29,#18,#a6,#97
	db #0c,#76,#c1,#7b,#06,#5a,#2a,#0a
	db #2a,#0a,#a8,#78,#0a,#a8,#78,#58
	db #78,#58,#28,#08,#28,#08,#a6,#76
	db #08,#a6,#76,#56,#a6,#58,#56,#26
	db #76,#56,#26,#06,#c1,#c7,#02,#a7
	db #06,#76,#96,#a6,#76,#96,#a6,#76
.l9c8f equ $ + 2
	db #c8,#c1,#c3,#0d,#00,#0c,#0e,#c0
	db #1a,#9d,#00,#00,#05,#00,#ff,#c0
	db #40,#9d,#0c,#0a,#05,#ff,#c0,#49
	db #9d,#0c,#ff,#c0,#1a,#9d,#01,#01
	db #06,#01,#ff,#c0,#40,#9d,#0d,#0b
	db #06,#ff,#c0,#49,#9d,#0d,#ff,#c4
.l9cbd
	db #c3,#0c,#00,#06,#10,#c0,#1a,#9d
	db #0c,#0c,#11,#0c,#ff,#c0,#40,#9d
	db #18,#16,#11,#ff,#c0,#49,#9d,#18
	db #ff,#c0,#50,#9d,#01,#01,#06,#01
	db #ff,#c0,#40,#9d,#19,#17,#12,#ff
.l9ceb equ $ + 6
	db #c0,#49,#9d,#19,#ff,#c4,#c3,#0a
	db #00,#01,#fe,#cc,#c7,#0d,#c0,#07
	db #9d,#00,#00,#00,#ff,#c8,#c3,#0a
	db #e0,#03,#c0,#cd,#c0,#49,#9d,#19
	db #ff,#c4,#c7,#02,#c9,#0a,#0b,#05
	db #0a,#0a,#0a,#c9,#0e,#0a,#c9,#0a
	db #0a,#0a,#0a,#c8,#c1,#07,#14,#06
	db #45,#0a,#54,#64,#75,#14,#75,#0a
	db #a5,#14,#a5,#0a,#74,#a4,#b4,#06
	db #a4,#75,#14,#65,#0a,#54,#34,#05
	db #14,#75,#0a,#a4,#06,#37,#14,#07
	db #0a,#c5,#c1,#75,#14,#74,#55,#0a
	db #24,#54,#74,#c1,#c6,#0a,#c7,#07
	db #74,#c8,#c1,#a9,#28,#99,#0a,#78
	db #c6,#14,#a9,#05,#98,#79,#0a,#58
	db #c5,#39,#14,#28,#07,#05,#36,#46
	db #56,#66,#76,#a6,#b6,#06,#38,#48
	db #58,#68,#78,#a8,#b8,#3a,#0a,#a8
	db #78,#68,#58,#38,#48,#58,#38,#08
.l9d83 equ $ + 6
	db #a6,#76,#56,#36,#06,#c1,#c3,#0d
	db #00,#10,#08,#c0,#e7,#9d,#00,#00
	db #05,#00,#00,#01,#06,#01,#01,#ff
.l9d98 equ $ + 3
	db #15,#3c,#c4,#c3,#0d,#80,#05,#80
	db #c0,#e7,#9d,#0c,#0c,#ff,#ca,#05
	db #02,#c0,#08,#9e,#0c,#07,#ff,#cb
	db #c0,#e7,#9d,#0c,#0d,#ff,#ca,#05
	db #01,#c0,#08,#9e,#0d,#08,#ff,#cb
.l9dc4 equ $ + 7
	db #c0,#e7,#9d,#0d,#ff,#17,#3c,#c3
	db #0c,#00,#01,#f0,#cc,#c7,#24,#c0
	db #da,#9d,#00,#ff,#c8,#c3,#0a,#f0
	db #03,#c0,#cd,#19,#3c,#0b,#18,#0b
	db #0c,#0a,#0b,#18,#c7,#04,#0b,#06
	db #c8,#c1,#05,#18,#07,#0c,#74,#a5
	db #24,#07,#18,#04,#75,#0c,#a4,#74
	db #35,#18,#04,#07,#0c,#74,#a4,#06
	db #26,#07,#18,#a4,#75,#0c,#a4,#74
	db #34,#44,#c1,#99,#06,#88,#58,#38
	db #58,#38,#08,#86,#96,#08,#38,#08
	db #96,#86,#56,#36,#56,#36,#86,#56
	db #36,#06,#84,#94,#06,#a4,#94,#54
	db #84,#54,#84,#94,#a4,#06,#a4,#94
	db #84,#a4,#84,#06,#a4,#36,#06,#56
	db #06,#86,#06,#a6,#86,#08,#38,#58
	db #38,#08,#a6,#08,#86,#56,#36,#06
.l9e4a equ $ + 5
	db #a4,#84,#57,#0c,#c1,#c3,#0f,#00
	db #0e,#08,#c7,#02,#c0,#c4,#9e,#00
	db #00,#ff,#c0,#d7,#9e,#00,#ff,#c0
	db #c4,#9e,#00,#ff,#c0,#f7,#9e,#00
	db #ff,#c0,#0b,#9f,#00,#ff,#c0,#c4
	db #9e,#00,#ff,#c0,#1d,#9f,#00,#ff
.l9e77 equ $ + 2
	db #c8,#c4,#c3,#0d,#00,#01,#f0,#cc
	db #c7,#10,#c0,#07,#9d,#00,#ff,#c0
.l9e8a equ $ + 5
	db #e8,#9e,#00,#ff,#c8,#c3,#0d,#f8
	db #02,#d0,#c0,#4b,#9f,#18,#18,#11
	db #18,#13,#ff,#c0,#0b,#9f,#24,#ff
	db #c0,#4b,#9f,#18,#13,#ff,#c3,#0f
	db #f8,#02,#80,#ca,#05,#02,#c0,#29
	db #9f,#00,#00,#05,#00,#09,#ff,#c0
	db #0b,#9f,#18,#ff,#c0,#29,#9f,#00
	db #ff,#cb,#c0,#1d,#9f,#0c,#ff,#05
	db #14,#34,#05,#0a,#34,#44,#55,#14
	db #93,#0a,#a2,#04,#35,#14,#05,#0a
	db #a2,#c1,#53,#14,#93,#0a,#04,#34
	db #55,#14,#34,#05,#0a,#34,#74,#55
	db #14,#34,#c1,#c7,#02,#c9,#07,#c7
	db #04,#09,#05,#c8,#c9,#0f,#09,#14
	db #c8,#c1,#73,#0a,#c5,#b2,#24,#54
	db #45,#14,#73,#0a,#b2,#24,#95,#14
	db #75,#0a,#54,#24,#a2,#c1,#53,#14
	db #83,#0a,#92,#a2,#b2,#04,#35,#14
	db #05,#0a,#34,#54,#85,#14,#54,#c1
	db #c6,#14,#74,#c5,#74,#c6,#0a,#c7
	db #07,#74,#c8,#c1,#a9,#05,#0a,#a8
	db #78,#68,#58,#38,#48,#58,#68,#78
	db #68,#58,#38,#08,#a6,#08,#38,#08
	db #a6,#08,#a6,#76,#66,#56,#66,#76
	db #66,#56,#36,#06,#36,#c1,#c7,#02
	db #07,#0a,#06,#08,#09,#05,#07,#0a
	db #06,#07,#05,#09,#0a,#08,#c8,#c1
.l9f5d
	db #c3,#0d,#f0,#08,#0e,#c7,#04,#c0
	db #cf,#9f,#00,#02,#04,#04,#ff,#c8
	db #c0,#cf,#9f,#01,#03,#05,#05,#02
	db #04,#06,#06,#03,#05,#07,#07,#00
.l9f82 equ $ + 5
	db #02,#04,#04,#ff,#c4,#c7,#08,#c6
	db #50,#c8,#ca,#05,#01,#c3,#0c,#80
	db #06,#80,#c0,#dc,#9f,#00,#ff,#c3
	db #0c,#c0,#01,#fe,#c0,#dc,#9f,#00
	db #ff,#c3,#0c,#00,#03,#c0,#c0,#dc
	db #9f,#01,#ff,#c3,#0c,#c0,#03,#80
	db #c0,#dc,#9f,#02,#ff,#c3,#0c,#80
	db #06,#80,#c0,#dc,#9f,#03,#ff,#c6
.l9fc1 equ $ + 4
	db #50,#c5,#c5,#c5,#c3,#0a,#00,#01
	db #f8,#cc,#c7,#20,#c0,#e8,#9e,#00
	db #ff,#c8,#83,#0a,#c5,#85,#0f,#35
	db #05,#65,#0a,#a4,#84,#64,#c1,#07
	db #05,#36,#66,#86,#b6,#08,#38,#68
	db #88,#b8,#88,#68,#88,#68,#38,#b8
	db #26,#56,#86,#a6,#18,#28,#58,#88
	db #a8,#1a,#a8,#88,#a8,#88,#58,#18
	db #46,#76,#a6,#08,#38,#48,#78,#a8
	db #0a,#3a,#0a,#a8,#0a,#a8,#78,#38
	db #46,#76,#a6,#08,#38,#48,#78,#a8
	db #0a,#3a,#0a,#a8,#0a,#a8,#78,#38
.la01e equ $ + 1
	db #c1,#c3,#0a,#00,#08,#06,#c0,#5f
	db #a0,#0c,#0c,#0e,#0e,#0c,#0c,#10
.la034 equ $ + 7
	db #ff,#c0,#71,#a0,#0c,#ff,#c4,#c3
	db #0a,#00,#08,#06,#c0,#9c,#a0,#0c
	db #0e,#0c,#ff,#c0,#5f,#a0,#04,#ff
.la049 equ $ + 4
	db #c0,#71,#a0,#00,#c3,#0a,#00,#08
	db #06,#c0,#83,#a0,#0c,#0e,#0c,#ff
	db #c0,#88,#a0,#0b,#ff,#c0,#92,#a0
	db #00,#ff,#a7,#06,#38,#58,#38,#b6
	db #38,#58,#38,#08,#38,#58,#38,#b6
	db #38,#58,#38,#c1,#29,#06,#78,#98
	db #78,#38,#78,#a8,#98,#38,#78,#a8
	db #0a,#58,#98,#0a,#98,#c1,#35,#18
	db #14,#b2,#a2,#35,#0c,#12,#b2,#a2
	db #82,#64,#b0,#a0,#c1,#75,#0c,#54
	db #34,#24,#04,#74,#54,#52,#c1,#37
	db #18,#a7,#24,#87,#06,#a6,#87,#0c
	db #66,#86,#67,#06,#86,#67,#0c,#56
	db #66,#57,#06,#66,#57,#0c,#36,#c1
.la0b5
	db #c3,#0b,#00,#03,#02,#c0,#04,#a1
	db #00,#ff,#c0,#44,#a1,#00,#00,#ff
	db #c0,#04,#a1,#00,#ff,#c0,#a1,#a1
.la0d0 equ $ + 3
	db #00,#ff,#c4,#c3,#0b,#00,#03,#02
	db #c0,#23,#a1,#00,#ff,#c0,#63,#a1
	db #00,#00,#ff,#c0,#23,#a1,#00,#ff
.la0ea equ $ + 5
	db #c0,#a5,#a1,#00,#ff,#c3,#0b,#00
	db #03,#02,#c0,#33,#a1,#00,#ff,#c0
	db #82,#a1,#00,#00,#ff,#c0,#33,#a1
	db #00,#ff,#c0,#a9,#a1,#00,#ff,#77
	db #18,#47,#08,#49,#18,#09,#08,#08
	db #48,#78,#0a,#4a,#7a,#0c,#7c,#99
	db #20,#89,#18,#89,#08,#0a,#4a,#0a
	db #78,#0a,#78,#48,#78,#c1,#47,#18
	db #07,#08,#09,#18,#77,#08,#47,#40
	db #59,#20,#58,#79,#40,#c1,#07,#18
	db #75,#08,#77,#18,#47,#08,#09,#40
	db #09,#20,#09,#20,#49,#40,#c1,#b7
	db #18,#b7,#08,#29,#10,#b6,#09,#18
	db #09,#08,#49,#10,#08,#b7,#18,#b7
	db #08,#29,#10,#b6,#c6,#08,#0a,#b8
	db #98,#78,#58,#48,#28,#c1,#77,#18
	db #77,#08,#b7,#10,#76,#77,#18,#77
	db #08,#09,#10,#76,#77,#18,#77,#08
	db #b7,#10,#76,#c6,#08,#78,#58,#48
	db #28,#08,#b6,#96,#c1,#27,#18,#27
	db #08,#77,#10,#26,#47,#18,#47,#08
	db #77,#10,#46,#27,#18,#27,#08,#77
	db #10,#26,#c6,#08,#48,#28,#08,#b6
	db #96,#76,#56,#c1,#b7,#40,#08,#c1
	db #57,#40,#76,#c1,#27,#40,#47,#40
.la1ae equ $ + 1
	db #c1,#c3,#0a,#f0,#03,#c0,#c6,#06
	db #c0,#e2,#a1,#07,#09,#0b,#0d,#0f
.la1c0 equ $ + 3
	db #11,#ff,#c4,#c3,#0a,#f0,#03,#c0
	db #c6,#06,#c0,#e2,#a1,#02,#04,#06
.la1d1 equ $ + 4
	db #08,#0a,#0c,#ff,#c3,#0a,#f0,#03
	db #c0,#c6,#06,#c0,#e2,#a1,#0c,#0e
	db #10,#12,#14,#16,#ff,#28,#96,#76
.la1ec equ $ + 7
	db #26,#36,#86,#a6,#38,#d0,#c1,#c3
	db #0a,#f0,#03,#c0,#ca,#05,#01,#c6
	db #09,#c0,#25,#a2,#06,#09,#0c,#0f
	db #12,#ff,#c3,#0a,#00,#10,#02,#c4
.la205
	db #c3,#0a,#f0,#03,#c0,#c6,#09,#c0
	db #25,#a2,#03,#07,#0a,#0d,#10,#ff
.la215
	db #c3,#0a,#f0,#03,#c0,#c6,#09,#c0
	db #25,#a2,#0d,#10,#13,#16,#19,#ff
	db #26,#56,#66,#a6,#18,#28,#58,#68
.la22f equ $ + 2
	db #d0,#c1,#c3,#0f,#00,#01,#06,#ca
	db #18,#01,#c0,#5d,#a2,#18,#ff,#05
.la23f equ $ + 2
	db #30,#c4,#c3,#0f,#00,#01,#06,#ca
	db #18,#01,#c0,#5d,#a2,#0e,#ff,#25
.la24e equ $ + 1
	db #30,#c3,#0f,#00,#01,#06,#ca,#18
	db #01,#c0,#5d,#a2,#0d,#ff,#15,#30
	db #05,#0c,#09,#18,#05,#06,#09,#0c
	db #0b,#03,#04,#0a,#04,#0b,#18,#07
	db #03,#c1,#00,#00
;
.init_music		; added by Megachur
;
	ld e,a
	jp real_init_music

;ld de,&0005
;ld a,0
;call init_music	

;org #917d
;ld e,#05
;call #94bd init
; 9572 -> play

;
.game_name
	db "Master of the Lamps",0
.game_year
	db "1985",0
.game_publisher
	db "Activision",0
.music_author
	db "",0
.music_comment
	db "",0

	read "music_end_v1_0.asm"
